open SwfTypes

external echo: string -> unit = "echo"
external mocker: string -> 'a jhmtasc_type -> 'a jhmtasc_type = "mocker"
external fail: string -> unit = "fail"

external assertInt: int -> int -> unit = "assertInt"
external assertString: string -> string -> unit = "assertString"
external assertBool: bool -> bool -> unit = "assertBool"

external assertTagId: string -> 'a jhmtasc_type -> unit = "assertTagId"
external assertJInt: 'a jhmtasc_type -> int -> unit = "assertJInt"
external assertJString: 'a jhmtasc_type -> string -> unit = "assertJString"
external assertJBool: 'a jhmtasc_type -> bool -> unit = "assertJBool"
external assertActionType: 'a jhmtasc_type -> string -> unit = "assertActionType"
external assertActionItemType: 'a jhmtasc_type -> string -> unit = "assertActionItemType"